﻿Imports System Imports System.Collections.Generic Imports System.Text

Public Class CLoaiKH

#Region "Khai báo thuộc tính"
    Private _maLoaiKH As Integer
    Private _ghiChu As String
    Private _tenLoaiKH As String

    Public Property maLoaiKH() As Integer
        Get
            Return _maLoaiKH
        End Get
        Set(ByVal value As Integer)
            _maLoaiKH = value
        End Set
    End Property

    Public Property tenLoaiKH() As String
        Get
            Return _tenLoaiKH
        End Get
        Set(ByVal value As String)
            _tenLoaiKH = value
        End Set
    End Property

    Public Property ghiChu() As String
        Get
            Return _ghiChu
        End Get
        Set(ByVal value As String)
            _ghiChu = value
        End Set
    End Property


#End Region

#Region "Phương thức khởi tạo"
    Public Sub New()
        Me.maLoaiKH = 0
        Me.tenLoaiKH = ""
        Me.ghiChu = ""
    End Sub
    Public Sub New(ByVal LoaiKH As CLoaiKH)
        Me.maLoaiKH = LoaiKH.maLoaiKH
        Me.tenLoaiKH = LoaiKH.tenLoaiKH
        Me.ghiChu = LoaiKH.ghiChu
    End Sub
    Public Sub New(ByVal ma_LoaiKH As Integer, ByVal ten_LoaiKH As String, ByVal ghi_Chu As String)
        Me.maLoaiKH = ma_LoaiKH
        Me.tenLoaiKH = ten_LoaiKH
        Me.ghiChu = ghi_Chu
    End Sub
#End Region

End Class

